home *** CD-ROM | disk | FTP | other *** search
/ Multimedia Frontier 1993 / MULTIMEDIA-FRONTIER-93.ISO.7z / MULTIMEDIA-FRONTIER-93.ISO / Total Distortion / 11 / 11.rsrc / BITD_1046 (.txt) < prev    next >
AmigaBASIC Source Code  |  1992-10-26  |  1KB  |  167 lines
  1.                                                                                                                                                                                                                                                                <0x23a9692><0x7e>PRINT<0xfa,0x00><0x7d><0x4c>
  2. <0x7c><0x7f><0x7e><0x7e>ASC<0xfa,0x00><0x59>
  3. ¥
  4. <0xfa,0x00><0x23a96a9><0x7e><0x7d>PRINTASCV<0x2b,0x00><0x53>
  5. EQV<0x7f><0x23a96b5><0x7e><0x7c>USR<0xfa,0x00><0x5d>
  6. <0xfa,0x00><0x23a96c0><0x7f><0x7f><0x7e>PRINT<0x60>¥<0x7f><0x23a96c8><0x7c><0xfa,0x00>¥ASC<0x7e><0x57>
  7. <0x23a96d1><0x60>PUT<0x7c><0x7c>PRINT<0x60>=<0xfa,0x00><0x23a96db><0x7e><0xfa,0x00><0xfa,0x01><0x7d><0x5f>
  8. <0xfa,0x00>PUT<0x7d><0x60><0x7d><0x7f>labelfffffefd<0x7e><0x7c><0x7f><0x23a96f3><0x7e><0x7c>ASCVV<0x7c><0x53>
  9. <0x23a96fc><0x60><0x60>=<0x60><0x7e>PRINT<0x7d><0x7e><0x7c><0x7f><0x23a9707><0x7d>ASCSTEPASC<0x7f><0x61>
  10. IMP
  11. <0x23a9712><0x7f><0x7f>=<0x7f>EQV<0x7f>PRINTATNPRINT<0x60><0x7d><0x7f><0x23a971f><0x7e><0xfa,0x00>VASC<0x7e><0x57>
  12. <0x7e><0x7f><0x60><0x7f><0x60><0xfa,0x00><0x7d><0x7d><0x7f>
  13. <0x7e><0x7e><0x7d>varfffffefeEQV<0x7f>/
  14. ¥
  15. <0x23a9743><0x60>=<0x7e><0x7d>PRINT<0x7d><0x7e><0x7f><0x60>=<0x7e><0xfa,0x00><0x7f><0x23a9752>=<0x60>=<0x7f><0x7f>=<0x60><0x7f><0x7f>EQV<0x7f><0x7f><
  16. <0x23a9761>PUT<0x7d>PRINT<0x7d><0x60><0x60><0x7f><0x60>AND<0x7f>
  17. EQVPTAB65268<0x7f><0x60><0x7e>EQV=<0x7d><0x7e><0x7e><0x7d>=<0x7f><0x7e><0xfa,0x00>OR
  18. labelffffffea<0x60>><0x7f>
  19.                                                                                                                                                                                                                                                                labelfffff4ff<0x7f><0x7e><0x7e><0x23a97c8><0x7d>PRINT<0x7d><0x7e><0x5e><0x5a><0x5c>/
  20. <0x5c><0x7f><0x7e>=d??]<0x7e>
  21. EQV
  22. THEN<0x7f>varffffeafe<0xfb,0x00>&Heaf4EQV<0x60><0x7e><0x7d><0x7d>]33cCOMMON<0x7c>MOD
  23.  
  24. <0x60>TO<0x7f><0x23a97fd><0x60><0x7f><0x7f><0x7e><0x7e>¥<0x7f><0x23a9805><0x7e>PRINT<0x7c>]339CLOSElabelffffacfc=<0xfb,0x00>=<0x60>EQVNOT<0x7f>9EQV<0x7f><0x7f><0x7e><0x7f>EQV<0x60>=EQV<0x60>=EQV<0x7f><0x7e><0x7f><0x7f>PRINTPUTCOMMONc8c<0x7d>PRINTPRINTMKD$<0x7e><0xfb,0x00>labelfffffdfd=<0x60><0x7f>234<0x7f><0x7f>=EQV<0x60><0x60>=<0x7f><0x60><0x7e><0x7e><0x7d>COMMONCOMMONRND<0x23a9850><0x60>><0x7d>PRINT<0x7c><0xfb,0x00><0x7d><0x7e><0x60>EQV<0x7f><0x23a985f>XORXORORAND/<0x54>-<0x23a9867><0xfb,0xfffffffb><0x23a986a>MOD<0xfb,0xfffffffb>SPCASCPRINT<0x7e><0x7d><0x7f><0x23a9875>EQV<0x60><0x7f><0x7f><0x60>==<0x7f><0x60>=<0x7e><0x7d><0x7c>
  25. labelfffffdad<0x60>ALL<0x23a988a><0x60><0x7f>XORAND<0x54><0x53><<0xfb,0x00>
  26. ~^IMPVASCPRINTPTAB<0x7d><0x7f>labelfffff4fe<0x7d><0x7c>
  27. labelffff88eaEQV<0xfb,0x00>labelfffff2d4<0x53><0x7e>$
  28. LEFT$<0x7d>$$$~  U/XORALLvarffffeaea<0x7c>
  29. varfffffdfe<0x7c><0x7f>$$s$OLEFT$<0xf3,0x00>
  30. ~+IMP<0x23a9911>*$$-AND
  31. EQVPTAB
  32. EQV<0x7c>
  33.  
  34. <0x60><0x7c><0x7f>varfffff0ec<0x7e>$
  35. LEFT$<0xf3,0x00><0x23a992c>sO$$sOLEFT$+IMP<0x23a9936>T$LEFT$$$+ORPTAB<0x7c>
  36.  
  37. =<0x7d><0x7f>
  38. <0x54><0x7e>$var4f73<0x7e>$
  39. s<0x7e>$<0x23a9953>O$$sO$~+IMP
  40. *<0x7e>$<0x7e>$varffffeffe<0x7d><0x7f><0x7c>
  41. <0x7d><0x7f><0x23a996c><0x54>$$O$s<0x7e>$<0x23a9975>O$<<<0x4d>-<0x54>^<0x55>ORXOREQV<0xf3,0x00><0x23a9984>PRINT<0xf3,0xfffffffb>STEP<0xf3,0xfffffffa>MOD<0x7d>IMP
  42. *<0x7e>$<0x23a9993>LEFT$$$LEFT$-<0x60><0x7e><0x7f><0x7c>
  43. <0x7e><0x7f><0x23a99a0><0xf3,0xfffffffb>Os$s$$<*^OREQV<0x60><0x7e><0x7f>varffffeae0+<0x7f><0x23a99b6>PRINT<0xf3,0xfffffffb><0x23a99ba>+$<0x7e>$$~<0xf3,0x00><0x7f><0x7c>
  44. <0x7e><0x7f>
  45. U<0x7e>$<0x23a99ce><<0x54><0x55><0x56><0x60><0x60>=<0x7f><0x7f>=<0x62><0x7f><0x23a99db>EQVOR*<$$LEFT$MOD                                                                                                                                                                                                                                                            
  46. <0x7e><0x7f><0x23a9a15>+$<0x53>AND=<0x60><0x7f><0x60><0x5c><0x7f><0x23a9a20><0x7f><0x60>=<0x7e><0x55>-~IMP<0x7e><0x7f><0x7c>
  47. <0x7e><0x7f>OR<0x7f><0x60><0x60><0x7f><0x23a9a36><0x60><0x7f><0x7f><0x60><0x7f><0x7f><0x60>PTABlabelffffe0fe<0xfd,0x00><0x7f><0xfd,0x00>labelffffffffEQV<0x5f><0x7f>
  48. <0x60><0x7d><0x7e>
  49. <0x7d><0x7e><0x7e><0x23a9a56><0x7d><0x60><0x7e><0x7e><0x7f><0x60><0x7f>EQV<0x7e><0x7f><0xfd,0x00><0x61><0x7f>&Hf4ff<0x7f><0x60>EQV<0x7e><0x7f><0x7e><0x7d><0x7e><0x7d>PRINT<0x7d><0x7d>PRINT<0x7e><0x7d>varffffe0fe<0x7e><0x7f><0xfd,0x00><0x62><0x7f>65535<0x60>EQV<0x7f><0x7e><0x60><0x7d><0x7e><0x7d>PRINT<0x7d>PRINT<0x7c><0x23a9a90><0x7c>PRINT<0x7c><0x7c><0xfd,0x00><0x7e>PRINT<0x60><0x7f><0x7f><0x7d>
  50. <0x23a9aa0><0x7f><0x7e><0x7e><0x7f>EQV=AND<0x7f><0x23a9aa9><0x60>XOREQV<0x7d><0xfd,0x00><0x7c><0x7e><0xfd,0x00><0x7c><0x7d><0x7d><0x7e><0x7e><0x23a9ab9>EQV<0x7e><0x7f>EQV<0x7d><0x7d>PRINTMID$<0xfd,0x00>MID$<0x7e>ASC<0x23a9ac7>MID$<0xfd,0xfffffffb>PRINT<0x7e>EQV<0x7f><0x7e>
  51. varfffffdfc<0x7c><0x7f>
  52. EQV<0xfd,0x00><0x23a9ada>EQV<0x56><0x55>/*-<0x53><<$~EQVIMP<0x23a9ae8>MOD+¥<0xfd,0xfffffffb><0x7c><0x7e><0x23a9af0>EQV<0x60>=<0x7d>PRINT<0xfd,0x00><0xfd,0x01>ASCASCPRINT<0x7e><0x7f><0x7e>
  53. <0x7d><0x60><0x7e><0xfd,0x00><0x23a9b08><0x56><0x55><0x54><0x53><O<0x7c>$
  54. ~-IMP63061<0x55>XOR<0x7f><0x7f><0x7e><0x7c>ASC<0x22,0x00>ASCASC<0x7c><0x7e>
  55.  
  56. <0x7d>ASCCOMMON<0x7d><0x7f>=<0x7f>EQV                                                                                                                                                                                                                                                <0x53><0x7e>$<0x23a9b95>sO$sO<0x7e>$O$~*IMP4IMPIMP*$$-^<0x56><0x7f><0x7f>=CLOSE{ABS<0x7c>PRINT=
  57. PRINTASC<0xf1,0x00><0x7e><0x7f><0x23a9bbd><0x56><0x53><$$s$O$$s<0x7e>$<0x23a9bcb>s$O$$~+IMPlabel2a4fs<0x7e>$6*XOR<0x7f>=<0x7e><0xf1,0x00><0x7c><0x7f>
  58. PRINT]PUTEQV<0x7f><0x7f><0x55><$s$O$O<0x7d>$label4f24s<0x7c>$
  59. ~/IMP<0x7e>IMP0*s$O$$s</EQV<0x7f><0x7f>PRINTPRINT=
  60. PUTASC<0x7e><0x7f>$$LEFT$<0x7c>$&H7324$O$s$$O$s$~+IMPvar2a4f<0x7e>$LEFT$ASC<0x7f><0x7f>=<0x7d><0x7e>
  61.  
  62. <0x7e><0x7e><0x7f>#T$LEFT$$$O$s$$Os+<0x4d><0x53>**/^ANDOROR<0xf1,0x00><0xf1,0x01><0x7c><0xf1,0x00><0x7c><0x7c><0xf1,0x00>ASC<0xf1,0x01><0x7e>¥
  63. +<0x7e>IMP$$s<0x7d>$<0x23a9c74>LEFT$*<0x7e><0x7f><0x7f><0x7e><0x7e>
  64. <0x7e><0x7f>varffffac30    s<0x53><0x54>RIGHT$OR<0x7e>EQV<0x23a9cb9><0x60><0x60><0x7f><0x7f>=<0x60><0x7f><0x60>/<0x7f><0x23a9cc4><0x7d><0x7d><0x22,0x00><0x54>-<O<0x7e>$labelffff9c2a<0x7c>                                                                                                                                                                                                                                                             
  65. <0x23a9d03><0x7f><0x7f>PRINTT$<*<0x55>XOR<0x60><0x7f><0x60><0x7f>=THEN<0x7f><0xfd,0x00><0x23a9d16>=<0x60>XOR^-LEFT$$IMPPRINT<0x7f><0x7f><0xfd,0x00><0x23a9d24><0x7f>PRINTz<0x55><0x7e>=<0x54><0x7f><0x23a9d2d><0x60>EQVAND¥<0x7c><0x7f><0xfd,0x00><0x7e><0x60>EQV<0x5e><0x7f>XOR<0x7f>
  66. <0x60><0x7e><0x7f><0xfd,0x00><0x7e><0x7e>EQV<0x59><0x7f>=<0x7f><0x60><0x7f><0x7f><0x60><0x7e><0x7f>labelffffe0ff<0x7f><0x7d>
  67. labelfffffdfd=-<0x7f>
  68. <0x60>EQV<0x7f>labelfffff4ff<0x7f><0x23a9d6c>EQV<0x7f><0x7f><0x60>EQV<0x7f><0x7e>=<0x7e><0x7d>=<0x7d><0x7e><0x23a9d7a>=<0x60>EQV<0x7f><0x60><0x7f>
  69.  
  70. <0x7c>PRINT<0x7d>-<0x7f>
  71. <0x60>*<0x7f>varffffe0ea<0x7e><0x7e>varfffffdfe<0x7e><0x7d>
  72. PRINT<0x7d><0x7d>varfffffefd<0x7e><0x7f>
  73.  
  74.  
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.  
  127.  
  128.  
  129.  
  130.  
  131.  
  132.  
  133.  
  134.  
  135.  
  136.  
  137.  
  138.  
  139.  
  140.  
  141.  
  142.  
  143.  
  144.  
  145.  
  146.  
  147.  
  148.  
  149.  
  150.  
  151.  
  152.  
  153.  
  154.  
  155.  
  156.  
  157.  
  158.  
  159.  
  160.  
  161.  
  162.  
  163.  
  164.  
  165.  
  166.  
  167.